home *** CD-ROM | disk | FTP | other *** search
- // Persistence of Vision Raytracer
- // UTAH Teapot w/ Bezier patches
- // adapted by Alexander Enzmann
-
- #include "<PVray$Dir>.dat.shapes"
- #include "<PVray$Dir>.dat.colors"
- #include "<PVray$Dir>.dat.textures"
-
- #declare Teapot_Texture = texture
- color CRed
- phong 1.0
- phongsize 20
- end_texture
-
- #declare Teapot_Orientation = <-110 20 0>
-
- #include "<PVray$Dir>.inc.teapot"
-
- view_point
- location <0.0 0.0 -10.0>
- direction < 0.0 0.0 1.0>
- up < 0.0 1.0 0.0>
- right < 1.3333 0.0 0.0>
- end_view_point
-
- object
- sphere <0.0 0.0 0.0> 1.0 end_sphere
- translate <10.0 40.0 -30.0>
- texture
- colour White
- ambient 1.0
- diffuse 0.0
- end_texture
- colour White
- light_source
- end_object
-
-
- { Floor }
- object
- plane <0 1 0> -8 end_plane
- texture checker
- color red 1.0 green 0.1 blue 0.1
- color red 0.8 green 0.8 blue 0.8
- scale <5 5 5>
- end_texture
- end_object
-
- { Back wall }
- object
- plane <0 0 1> 100 end_plane
- texture color red 0.3 green 0.3 blue 0.5 end_texture
- end_object
-